        Dim writeMessage = Sub(msg As String) Console.WriteLine(msg)